home *** CD-ROM | disk | FTP | other *** search
/ Apple WWDC 1996 / WWDC96_1996 (CD).toast / Technology Materials / MacOS 8 Resources / Developer Tools / Mac OS 8 Interfaces & Libraries / Interfaces / PInterfaces / Finder.p < prev    next >
Encoding:
Text File  |  1996-05-01  |  3.9 KB  |  141 lines  |  [TEXT/MPS ]
  1. {
  2.      File:        Finder.p
  3.  
  4.      Contains:    Finder flags and container types.
  5.  
  6.      Version:    Technology:    System 7.5
  7.                  Release:    Universal Interfaces 3.0d3 on Copland DR1
  8.  
  9.      Copyright:    © 1984-1996 by Apple Computer, Inc.  All rights reserved.
  10.  
  11.      Bugs?:        If you find a problem with this file, send the file and version
  12.                  information (from above) and the problem description to:
  13.  
  14.                      Internet:    apple.bugs@applelink.apple.com
  15.                      AppleLink:    APPLE.BUGS
  16.  
  17. }
  18. {$IFC UNDEFINED UsingIncludes}
  19. {$SETC UsingIncludes := 0}
  20. {$ENDC}
  21.  
  22. {$IFC NOT UsingIncludes}
  23.  UNIT Finder;
  24.  INTERFACE
  25. {$ENDC}
  26.  
  27. {$IFC UNDEFINED __FINDER__}
  28. {$SETC __FINDER__ := 1}
  29.  
  30. {$I+}
  31. {$SETC FinderIncludes := UsingIncludes}
  32. {$SETC UsingIncludes := 1}
  33.  
  34. {$IFC UNDEFINED __TYPES__}
  35. {$I Types.p}
  36. {$ENDC}
  37.  
  38. {$PUSH}
  39. {$ALIGN MAC68K}
  40. {$LibExport+}
  41.  
  42.  
  43. CONST
  44.                                                                 {  Make only the following consts avaiable to resource files that include this file  }
  45.     kCustomIconResource            = -16455;                        {  Custom icon family resource ID  }
  46.     kContainerFolderAliasType    = 'fdrp';                        {  type for folder aliases  }
  47.     kContainerTrashAliasType    = 'trsh';                        {  type for trash folder aliases  }
  48.     kContainerHardDiskAliasType    = 'hdsk';                        {  type for hard disk aliases  }
  49.     kContainerFloppyAliasType    = 'flpy';                        {  type for floppy aliases  }
  50.     kContainerServerAliasType    = 'srvr';                        {  type for server aliases  }
  51.     kApplicationAliasType        = 'adrp';                        {  type for application aliases  }
  52.     kContainerAliasType            = 'drop';                        {  type for all other containers  }
  53.                                                                 {  types for Special folder aliases  }
  54.     kSystemFolderAliasType        = 'fasy';
  55.     kAppleMenuFolderAliasType    = 'faam';
  56.     kStartupFolderAliasType        = 'fast';
  57.     kPrintMonitorDocsFolderAliasType = 'fapn';
  58.     kPreferencesFolderAliasType    = 'fapf';
  59.     kControlPanelFolderAliasType = 'fact';
  60.     kExtensionFolderAliasType    = 'faex';                        {  types for AppleShare folder aliases  }
  61.     kExportedFolderAliasType    = 'faet';
  62.     kDropFolderAliasType        = 'fadr';
  63.     kSharedFolderAliasType        = 'fash';
  64.     kMountedFolderAliasType        = 'famn';
  65.  
  66.                                                                 {  Finder Flags  }
  67.     kIsOnDesk                    = $01;
  68.     kColor                        = $0E;
  69.     kIsShared                    = $40;
  70.     kHasBeenInited                = $0100;
  71.     kHasCustomIcon                = $0400;
  72.     kIsStationery                = $0800;
  73.     kIsStationary                = $0800;
  74.     kNameLocked                    = $1000;
  75.     kHasBundle                    = $2000;
  76.     kIsInvisible                = $4000;
  77.     kIsAlias                    = $8000;
  78.  
  79. {
  80.     The following declerations used to be in Files.i, 
  81.     but are Finder specific and were moved here.
  82. }
  83. {$IFC NOT OLDROUTINELOCATIONS }
  84.                                                                 {  Finder Constants  }
  85.     fOnDesk                        = 1;
  86.     fHasBundle                    = 8192;
  87.     fTrash                        = -3;
  88.     fDesktop                    = -2;
  89.     fDisk                        = 0;
  90.  
  91.  
  92. TYPE
  93.     FInfoPtr = ^FInfo;
  94.     FInfo = RECORD
  95.         fdType:                    OSType;                                    { the type of the file }
  96.         fdCreator:                OSType;                                    { file's creator }
  97.         fdFlags:                INTEGER;                                { flags ex. hasbundle,invisible,locked, etc. }
  98.         fdLocation:                Point;                                    { file's location in folder }
  99.         fdFldr:                    INTEGER;                                { folder containing file }
  100.     END;
  101.  
  102.     FXInfoPtr = ^FXInfo;
  103.     FXInfo = RECORD
  104.         fdIconID:                INTEGER;                                { Icon ID }
  105.         fdUnused:                ARRAY [0..2] OF INTEGER;                { unused but reserved 6 bytes }
  106.         fdScript:                SInt8;                                    { Script flag and number }
  107.         fdXFlags:                SInt8;                                    { More flag bits }
  108.         fdComment:                INTEGER;                                { Comment ID }
  109.         fdPutAway:                LONGINT;                                { Home Dir ID }
  110.     END;
  111.  
  112.     DInfoPtr = ^DInfo;
  113.     DInfo = RECORD
  114.         frRect:                    Rect;                                    { folder rect }
  115.         frFlags:                INTEGER;                                { Flags }
  116.         frLocation:                Point;                                    { folder location }
  117.         frView:                    INTEGER;                                { folder view }
  118.     END;
  119.  
  120.     DXInfoPtr = ^DXInfo;
  121.     DXInfo = RECORD
  122.         frScroll:                Point;                                    { scroll position }
  123.         frOpenChain:            LONGINT;                                { DirID chain of open folders }
  124.         frScript:                SInt8;                                    { Script flag and number }
  125.         frXFlags:                SInt8;                                    { More flag bits }
  126.         frComment:                INTEGER;                                { comment }
  127.         frPutAway:                LONGINT;                                { DirID }
  128.     END;
  129.  
  130. {$ENDC}
  131. {$ALIGN RESET}
  132. {$POP}
  133.  
  134. {$SETC UsingIncludes := FinderIncludes}
  135.  
  136. {$ENDC} {__FINDER__}
  137.  
  138. {$IFC NOT UsingIncludes}
  139.  END.
  140. {$ENDC}
  141.